﻿Public Class Unit1session1b
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim firstno, secondno, result As Double
        firstno = CSng(currencyindollars.Text)
        secondno = firstno * 0.62
        result = secondno
        Total.Text = result
    End Sub


End Class